home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 November / EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso / earcd / misc / a8085.lha / A8085 V1.0 / SRC / TestKernal.a < prev   
Text File  |  1995-07-31  |  393b  |  19 lines
  1.           inc Kernal.i
  2.           org $1000
  3.  
  4. txt:      dc.b "A",0,"85 kernal installed",10
  5.           dc.b "© ",0,"4-1995 by Frank Würkner",10,0
  6. start:
  7.           lxi  h,txt
  8.           call print
  9.           mvi  a,$80
  10.           call printbcd
  11.           call print
  12.           mvi  a,16
  13.           mvi  b,12
  14.           call mul
  15.           adi  7
  16.           call printacc
  17.           call print
  18.           hlt
  19.